home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 33
/
033.d81
/
hello connect
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
430b
|
11 lines
1 poke51201,0:poke927,0:poke1023,0:poke53281,.:poke53280,.
2 poke55,.:poke56,160:clr:gosub20:c$=chr$(34):poke808,237
7 poke646,peek(53281):print"l[207]"c$"pre*"c$",8"
8 print"run";
10 poke631,13:poke632,13:poke198,2:end
20 print"[147][155] [167][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][165]"
30 print" [167] [199]oing to [204]oadstar [205]enu ... [155][165]"
40 print"[156][163][163][163][163][163][155][167][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][165][156][163][163][163][163][163]";
45 l$="[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
50 print"[154]"l$:print""l$:print"[158]"l$:print"[129]"l$:print""l$"";:return